home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1997 September / Macworld (1997-09).dmg / Serious Software / Cherwell Scientific Demos / pro Fit / pro Fit 5.0 demo (ppc).sea / pro Fit 5.0 demo (ppc) / External Modules / Plot3D sources / Plot3DFunction.c < prev    next >
MacBinary  |  1996-07-18  |  11.5 KB  |  [TEXT/CWIE]

view JSON data     |     view as text     |     open on a Mac     |     open on a PC

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: Plot3DFunction.c

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert Compact Compressed (Unix) (archive/compact) ext Supported
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Thu Jul 18 22:11:25 1996, modified Thu Jul 18 22:11:25 1996, creator 'CWIE', type ASCII, 11107 bytes "Plot3DFunction.c" magic text fragment for file(1) cmd, 1st line "#include "proFit_interface.h"", 2nd line "", 3rd line "#ifndef __MODULE_UTILITIES__", 4th line "#include "ModuleUtilities.h"", 5th line "#endif", at 0x2be3 410 bytes resource magic text fragment for file(1) cmd, 1st line "#include "proFit_interface.h"", 2nd line "", 3rd line "#ifndef __MODULE_UTILITIES__", 4th line "#include "ModuleUtilities.h"", 5th line "#endif" default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[CWIE]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 10 50 6c 6f 74 33 44 | 46 75 6e 63 74 69 6f 6e |..Plot3D|Function|
|00000010| 2e 63 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.c......|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 2b 63 00 | 00 01 9a ae 14 9f 4d ae |.....+c.|......M.|
|00000060| 14 9f 4d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..M.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 47 54 00 00 |........|....GT..|
|00000080| 23 69 6e 63 6c 75 64 65 | 20 22 70 72 6f 46 69 74 |#include| "proFit|
|00000090| 5f 69 6e 74 65 72 66 61 | 63 65 2e 68 22 0d 0d 23 |_interfa|ce.h"..#|
|000000a0| 69 66 6e 64 65 66 20 5f | 5f 4d 4f 44 55 4c 45 5f |ifndef _|_MODULE_|
|000000b0| 55 54 49 4c 49 54 49 45 | 53 5f 5f 0d 23 69 6e 63 |UTILITIE|S__.#inc|
|000000c0| 6c 75 64 65 20 22 4d 6f | 64 75 6c 65 55 74 69 6c |lude "Mo|duleUtil|
|000000d0| 69 74 69 65 73 2e 68 22 | 0d 23 65 6e 64 69 66 0d |ities.h"|.#endif.|
|000000e0| 23 69 66 6e 64 65 66 20 | 5f 5f 53 54 52 49 4e 47 |#ifndef |__STRING|
|000000f0| 5f 53 55 50 50 4f 52 54 | 5f 5f 0d 23 69 6e 63 6c |_SUPPORT|__.#incl|
|00000100| 75 64 65 20 22 53 74 72 | 69 6e 67 53 75 70 70 6f |ude "Str|ingSuppo|
|00000110| 72 74 2e 68 22 0d 23 65 | 6e 64 69 66 0d 23 69 66 |rt.h".#e|ndif.#if|
|00000120| 6e 64 65 66 20 5f 5f 50 | 4c 4f 54 54 45 52 5f 33 |ndef __P|LOTTER_3|
|00000130| 44 5f 5f 0d 23 69 6e 63 | 6c 75 64 65 20 22 50 6c |D__.#inc|lude "Pl|
|00000140| 6f 74 74 65 72 33 44 2e | 68 22 0d 23 65 6e 64 69 |otter3D.|h".#endi|
|00000150| 66 0d 0d 23 69 6e 63 6c | 75 64 65 20 3c 66 70 2e |f..#incl|ude <fp.|
|00000160| 68 3e 0d 23 69 6e 63 6c | 75 64 65 20 3c 66 65 6e |h>.#incl|ude <fen|
|00000170| 76 2e 68 3e 0d 0d 23 69 | 6e 63 6c 75 64 65 20 3c |v.h>..#i|nclude <|
|00000180| 51 44 33 44 47 65 6f 6d | 65 74 72 79 2e 68 3e 0d |QD3DGeom|etry.h>.|
|00000190| 23 69 6e 63 6c 75 64 65 | 20 3c 51 44 33 44 53 65 |#include| <QD3DSe|
|000001a0| 74 2e 68 3e 0d 23 69 6e | 63 6c 75 64 65 20 3c 51 |t.h>.#in|clude <Q|
|000001b0| 44 33 44 53 74 79 6c 65 | 2e 68 3e 0d 0d 0d 73 74 |D3DStyle|.h>...st|
|000001c0| 61 74 69 63 20 42 6f 6f | 6c 65 61 6e 09 09 7a 41 |atic Boo|lean..zA|
|000001d0| 75 74 6f 6d 61 74 69 63 | 20 3d 20 74 72 75 65 3b |utomatic| = true;|
|000001e0| 0d 0d 73 74 61 74 69 63 | 20 73 68 6f 72 74 09 09 |..static| short..|
|000001f0| 78 50 61 72 61 6d 3d 30 | 2c 20 79 50 61 72 61 6d |xParam=0|, yParam|
|00000200| 3d 31 3b 09 09 2f 2f 20 | 74 68 65 20 70 61 72 61 |=1;..// |the para|
|00000210| 6d 65 74 65 72 73 20 66 | 6f 72 20 78 2c 20 79 20 |meters f|or x, y |
|00000220| 28 30 20 69 66 20 3d 78 | 29 0d 73 74 61 74 69 63 |(0 if =x|).static|
|00000230| 20 6c 6f 6e 67 09 09 09 | 78 52 65 73 3d 32 35 2c | long...|xRes=25,|
|00000240| 20 79 52 65 73 3d 32 35 | 3b 09 09 2f 2f 20 72 65 | yRes=25|;..// re|
|00000250| 73 6f 6c 75 74 69 6f 6e | 20 61 6c 6f 6e 67 20 78 |solution| along x|
|00000260| 2c 20 79 0d 0d 0d 0d 74 | 79 70 65 64 65 66 20 73 |, y....t|ypedef s|
|00000270| 74 72 75 63 74 09 09 09 | 09 09 09 09 2f 2f 20 74 |truct...|....// t|
|00000280| 68 65 20 73 74 72 75 63 | 74 20 72 65 74 75 72 6e |he struc|t return|
|00000290| 65 64 20 62 79 20 44 61 | 74 61 41 72 72 61 79 45 |ed by Da|taArrayE|
|000002a0| 6c 65 6d 65 6e 74 0d 7b | 0d 09 64 6f 75 62 6c 65 |lement.{|..double|
|000002b0| 09 7a 3b 09 09 09 09 09 | 09 09 2f 2f 20 74 68 65 |.z;.....|..// the|
|000002c0| 20 7a 2d 76 61 6c 75 65 | 20 61 74 20 74 68 69 73 | z-value| at this|
|000002d0| 20 70 6f 69 6e 74 0d 09 | 6c 6f 6e 67 09 76 61 6c | point..|long.val|
|000002e0| 69 64 3b 09 09 09 09 09 | 09 2f 2f 20 74 72 75 65 |id;.....|.// true|
|000002f0| 20 69 66 20 7a 2d 70 6f | 69 6e 74 20 69 73 20 76 | if z-po|int is v|
|00000300| 61 6c 69 64 0d 09 76 6f | 69 64 2a 09 6d 65 73 68 |alid..vo|id*.mesh|
|00000310| 56 65 72 74 65 78 3b 09 | 09 09 09 09 2f 2f 20 6d |Vertex;.|....// m|
|00000320| 65 73 68 20 76 65 72 74 | 65 78 0d 7d 20 41 72 72 |esh vert|ex.} Arr|
|00000330| 61 79 45 6e 74 72 79 3b | 0d 0d 73 74 61 74 69 63 |ayEntry;|..static|
|00000340| 20 41 72 72 61 79 45 6e | 74 72 79 2a 2a 09 09 64 | ArrayEn|try**..d|
|00000350| 61 74 61 41 72 72 61 79 | 3d 6e 69 6c 3b 09 09 2f |ataArray|=nil;../|
|00000360| 2f 20 32 44 2d 61 72 72 | 61 79 20 68 6f 6c 64 69 |/ 2D-arr|ay holdi|
|00000370| 6e 67 20 66 75 6e 63 74 | 69 6f 6e 27 73 20 76 61 |ng funct|ion's va|
|00000380| 6c 75 65 73 0d 09 09 09 | 09 09 09 09 09 09 09 09 |lues....|........|
|00000390| 2f 2f 20 74 68 65 20 73 | 69 7a 65 20 69 73 20 67 |// the s|ize is g|
|000003a0| 69 76 65 6e 20 62 79 20 | 78 52 65 73 2c 20 79 52 |iven by |xRes, yR|
|000003b0| 65 73 0d 09 09 09 09 09 | 09 09 09 09 09 09 2f 2f |es......|......//|
|000003c0| 20 75 73 65 20 44 61 74 | 61 41 72 72 61 79 45 6e | use Dat|aArrayEn|
|000003d0| 74 72 79 20 66 6f 72 20 | 61 63 63 65 73 73 0d 73 |try for |access.s|
|000003e0| 74 61 74 69 63 20 64 6f | 75 62 6c 65 20 64 61 74 |tatic do|uble dat|
|000003f0| 61 58 4d 69 6e 2c 20 64 | 61 74 61 59 4d 69 6e 3b |aXMin, d|ataYMin;|
|00000400| 09 09 09 2f 2f 20 78 2f | 79 20 63 6f 6f 72 64 69 |...// x/|y coordi|
|00000410| 6e 61 74 65 20 6f 66 20 | 62 6f 74 74 6f 6d 20 6c |nate of |bottom l|
|00000420| 65 66 74 20 70 6f 69 6e | 74 20 69 6e 20 64 61 74 |eft poin|t in dat|
|00000430| 61 41 72 72 61 79 0d 73 | 74 61 74 69 63 20 64 6f |aArray.s|tatic do|
|00000440| 75 62 6c 65 20 64 61 74 | 61 44 58 2c 20 64 61 74 |uble dat|aDX, dat|
|00000450| 61 44 59 3b 09 09 09 09 | 2f 2f 20 78 2d 20 79 2d |aDY;....|// x- y-|
|00000460| 73 74 65 70 73 20 69 6e | 20 64 61 74 61 41 72 72 |steps in| dataArr|
|00000470| 61 79 20 62 65 74 77 65 | 65 6e 20 6e 65 69 67 68 |ay betwe|en neigh|
|00000480| 62 6f 75 72 69 6e 67 20 | 70 6f 69 6e 74 73 0d 0d |bouring |points..|
|00000490| 0d 73 74 61 74 69 63 20 | 52 65 63 74 09 09 09 09 |.static |Rect....|
|000004a0| 73 65 74 75 70 44 69 61 | 6c 6f 67 52 65 63 74 20 |setupDia|logRect |
|000004b0| 3d 20 7b 30 2c 30 2c 30 | 2c 30 7d 3b 09 09 2f 2f |= {0,0,0|,0};..//|
|000004c0| 20 64 65 66 61 75 6c 74 | 20 70 6f 73 69 74 69 6f | default| positio|
|000004d0| 6e 73 20 6f 66 20 64 69 | 61 6c 6f 67 73 0d 73 74 |ns of di|alogs.st|
|000004e0| 61 74 69 63 20 52 65 63 | 74 09 09 09 09 6f 70 74 |atic Rec|t....opt|
|000004f0| 69 6f 6e 73 44 69 61 6c | 6f 67 52 65 63 74 20 3d |ionsDial|ogRect =|
|00000500| 20 7b 30 2c 30 2c 30 2c | 30 7d 3b 09 09 2f 2f 20 | {0,0,0,|0};..// |
|00000510| 64 65 66 61 75 6c 74 20 | 70 6f 73 69 74 69 6f 6e |default |position|
|00000520| 73 20 6f 66 20 64 69 61 | 6c 6f 67 73 0d 73 74 61 |s of dia|logs.sta|
|00000530| 74 69 63 20 52 65 63 74 | 09 09 09 09 68 65 6c 70 |tic Rect|....help|
|00000540| 44 69 61 6c 6f 67 52 65 | 63 74 20 3d 20 7b 30 2c |DialogRe|ct = {0,|
|00000550| 30 2c 30 2c 30 7d 3b 0d | 0d 0d 0d 42 6f 6f 6c 65 |0,0,0};.|...Boole|
|00000560| 61 6e 20 49 6e 69 74 50 | 6c 6f 74 46 75 6e 63 74 |an InitP|lotFunct|
|00000570| 69 6f 6e 28 76 6f 69 64 | 29 0d 09 2f 2f 20 74 68 |ion(void|)..// th|
|00000580| 69 73 20 66 75 6e 63 20 | 69 73 20 63 61 6c 6c 65 |is func |is calle|
|00000590| 64 20 77 68 65 6e 20 50 | 6c 6f 74 74 65 72 33 44 |d when P|lotter3D|
|000005a0| 20 73 74 61 72 74 73 2e | 20 49 74 20 73 68 6f 75 | starts.| It shou|
|000005b0| 6c 64 20 72 65 74 75 72 | 6e 20 66 61 6c 73 65 0d |ld retur|n false.|
|000005c0| 09 2f 2f 20 69 66 20 77 | 65 20 73 68 6f 75 6c 64 |.// if w|e should|
|000005d0| 20 65 78 69 74 0d 7b 0d | 09 64 61 74 61 41 72 72 | exit.{.|.dataArr|
|000005e0| 61 79 20 3d 20 6e 69 6c | 3b 0d 0d 09 72 65 74 75 |ay = nil|;...retu|
|000005f0| 72 6e 20 74 72 75 65 3b | 0d 7d 0d 0d 76 6f 69 64 |rn true;|.}..void|
|00000600| 20 43 6c 65 61 6e 75 70 | 50 6c 6f 74 46 75 6e 63 | Cleanup|PlotFunc|
|00000610| 74 69 6f 6e 28 76 6f 69 | 64 29 0d 09 2f 2f 20 74 |tion(voi|d)..// t|
|00000620| 68 69 73 20 66 75 6e 63 | 20 69 73 20 63 61 6c 6c |his func| is call|
|00000630| 65 64 20 77 68 65 6e 20 | 50 6c 6f 74 74 65 72 33 |ed when |Plotter3|
|00000640| 44 20 65 78 69 74 73 2e | 0d 7b 0d 09 69 66 20 28 |D exits.|.{..if (|
|00000650| 64 61 74 61 41 72 72 61 | 79 20 21 3d 20 6e 69 6c |dataArra|y != nil|
|00000660| 29 20 44 69 73 70 6f 73 | 65 48 61 6e 64 6c 65 28 |) Dispos|eHandle(|
|00000670| 28 48 61 6e 64 6c 65 29 | 64 61 74 61 41 72 72 61 |(Handle)|dataArra|
|00000680| 79 29 3b 0d 7d 0d 0d 23 | 70 72 61 67 6d 61 20 6d |y);.}..#|pragma m|
|00000690| 61 72 6b 20 2d 0d 0d 73 | 74 61 74 69 63 20 41 72 |ark -..s|tatic Ar|
|000006a0| 72 61 79 45 6e 74 72 79 | 2a 20 44 61 74 61 41 72 |rayEntry|* DataAr|
|000006b0| 72 61 79 45 6c 65 6d 65 | 6e 74 28 6c 6f 6e 67 20 |rayEleme|nt(long |
|000006c0| 72 6f 77 2c 20 6c 6f 6e | 67 20 63 6f 6c 29 0d 09 |row, lon|g col)..|
|000006d0| 2f 2f 20 72 65 74 75 72 | 6e 73 20 70 6f 69 6e 74 |// retur|ns point|
|000006e0| 65 72 20 74 6f 20 61 6e | 20 65 6e 74 72 79 20 69 |er to an| entry i|
|000006f0| 6e 20 64 61 74 61 41 72 | 72 61 79 0d 7b 0d 09 72 |n dataAr|ray.{..r|
|00000700| 65 74 75 72 6e 20 28 2a | 64 61 74 61 41 72 72 61 |eturn (*|dataArra|
|00000710| 79 20 2b 20 28 78 52 65 | 73 2a 72 6f 77 20 2b 20 |y + (xRe|s*row + |
|00000720| 63 6f 6c 29 29 3b 0d 7d | 0d 0d 73 74 61 74 69 63 |col));.}|..static|
|00000730| 20 64 6f 75 62 6c 65 20 | 47 65 74 44 61 74 61 41 | double |GetDataA|
|00000740| 72 72 61 79 28 6c 6f 6e | 67 20 72 6f 77 2c 20 6c |rray(lon|g row, l|
|00000750| 6f 6e 67 20 63 6f 6c 29 | 09 0d 09 2f 2f 20 72 65 |ong col)|...// re|
|00000760| 74 75 72 6e 73 20 61 20 | 76 61 6c 75 65 20 66 72 |turns a |value fr|
|00000770| 6f 6d 20 64 61 74 61 41 | 72 72 61 79 0d 7b 0d 09 |om dataA|rray.{..|
|00000780| 72 65 74 75 72 6e 20 2a | 28 64 6f 75 62 6c 65 2a |return *|(double*|
|00000790| 29 28 2a 64 61 74 61 41 | 72 72 61 79 20 2b 20 73 |)(*dataA|rray + s|
|000007a0| 69 7a 65 6f 66 28 64 6f | 75 62 6c 65 29 2a 28 78 |izeof(do|uble)*(x|
|000007b0| 52 65 73 2a 72 6f 77 20 | 2b 20 63 6f 6c 29 29 3b |Res*row |+ col));|
|000007c0| 0d 7d 0d 0d 73 74 61 74 | 69 63 20 76 6f 69 64 20 |.}..stat|ic void |
|000007d0| 53 65 74 44 61 74 61 41 | 72 72 61 79 28 6c 6f 6e |SetDataA|rray(lon|
|000007e0| 67 20 72 6f 77 2c 20 6c | 6f 6e 67 20 63 6f 6c 2c |g row, l|ong col,|
|000007f0| 20 64 6f 75 62 6c 65 20 | 76 61 6c 75 65 29 0d 09 | double |value)..|
|00000800| 2f 2f 20 73 65 74 73 20 | 61 20 76 61 6c 75 65 20 |// sets |a value |
|00000810| 69 6e 20 64 61 74 61 41 | 72 72 61 79 0d 7b 0d 09 |in dataA|rray.{..|
|00000820| 2a 28 64 6f 75 62 6c 65 | 2a 29 28 2a 64 61 74 61 |*(double|*)(*data|
|00000830| 41 72 72 61 79 20 2b 20 | 73 69 7a 65 6f 66 28 64 |Array + |sizeof(d|
|00000840| 6f 75 62 6c 65 29 2a 28 | 78 52 65 73 2a 72 6f 77 |ouble)*(|xRes*row|
|00000850| 20 2b 20 63 6f 6c 29 29 | 20 3d 20 76 61 6c 75 65 | + col))| = value|
|00000860| 3b 0d 7d 0d 0d 73 74 61 | 74 69 63 20 42 6f 6f 6c |;.}..sta|tic Bool|
|00000870| 65 61 6e 20 4d 79 46 75 | 6e 63 74 69 6f 6e 28 64 |ean MyFu|nction(d|
|00000880| 6f 75 62 6c 65 20 78 2c | 20 64 6f 75 62 6c 65 20 |ouble x,| double |
|00000890| 79 2c 20 64 6f 75 62 6c | 65 2a 20 63 6f 6e 73 74 |y, doubl|e* const|
|000008a0| 20 78 33 29 0d 7b 0d 09 | 64 6f 75 62 6c 65 09 78 | x3).{..|double.x|
|000008b0| 30 20 3d 20 30 3b 0d 09 | 53 74 72 32 35 35 09 73 |0 = 0;..|Str255.s|
|000008c0| 3b 0d 0d 09 69 66 20 28 | 78 50 61 72 61 6d 20 21 |;...if (|xParam !|
|000008d0| 3d 20 30 29 20 53 65 74 | 46 75 6e 63 74 69 6f 6e |= 0) Set|Function|
|000008e0| 50 61 72 61 6d 28 22 5c | 70 22 2c 78 50 61 72 61 |Param("\|p",xPara|
|000008f0| 6d 2c 20 78 29 3b 0d 09 | 65 6c 73 65 20 78 30 20 |m, x);..|else x0 |
|00000900| 3d 20 78 3b 0d 09 69 66 | 20 28 79 50 61 72 61 6d |= x;..if| (yParam|
|00000910| 20 21 3d 20 30 29 20 53 | 65 74 46 75 6e 63 74 69 | != 0) S|etFuncti|
|00000920| 6f 6e 50 61 72 61 6d 28 | 22 5c 70 22 2c 79 50 61 |onParam(|"\p",yPa|
|00000930| 72 61 6d 2c 20 79 29 3b | 0d 09 65 6c 73 65 20 78 |ram, y);|..else x|
|00000940| 30 20 3d 20 79 3b 0d 09 | 2a 78 33 20 3d 20 43 61 |0 = y;..|*x3 = Ca|
|00000950| 6c 6c 46 75 6e 63 74 69 | 6f 6e 28 22 5c 70 22 2c |llFuncti|on("\p",|
|00000960| 20 78 30 29 3b 0d 09 69 | 66 20 28 47 65 74 41 6e | x0);..i|f (GetAn|
|00000970| 64 53 65 74 53 74 61 74 | 75 73 28 2d 31 2c 20 73 |dSetStat|us(-1, s|
|00000980| 29 20 3d 3d 20 33 29 09 | 09 09 2f 2f 20 69 66 20 |) == 3).|..// if |
|00000990| 72 75 6e 2d 74 69 6d 65 | 20 65 72 72 6f 72 0d 09 |run-time| error..|
|000009a0| 7b 09 47 65 74 41 6e 64 | 53 65 74 53 74 61 74 75 |{.GetAnd|SetStatu|
|000009b0| 73 28 30 2c 20 73 29 3b | 09 09 09 09 09 2f 2f 20 |s(0, s);|.....// |
|000009c0| 72 65 73 65 74 20 69 74 | 0d 09 09 2a 78 33 20 3d |reset it|...*x3 =|
|000009d0| 20 30 3b 0d 09 09 72 65 | 74 75 72 6e 20 66 61 6c | 0;...re|turn fal|
|000009e0| 73 65 3b 0d 09 7d 0d 0d | 09 72 65 74 75 72 6e 20 |se;..}..|.return |
|000009f0| 21 4e 75 6d 62 65 72 49 | 6e 76 61 6c 69 64 28 2a |!NumberI|nvalid(*|
|00000a00| 78 33 29 3b 0d 7d 2f 2f | 4d 79 46 75 6e 63 74 69 |x3);.}//|MyFuncti|
|00000a10| 6f 6e 0d 0d 0d 0d 73 74 | 61 74 69 63 20 42 6f 6f |on....st|atic Boo|
|00000a20| 6c 65 61 6e 20 43 61 6c | 63 75 6c 61 74 65 44 61 |lean Cal|culateDa|
|00000a30| 74 61 41 72 72 61 79 28 | 76 6f 69 64 29 0d 09 2f |taArray(|void)../|
|00000a40| 2f 20 73 65 74 73 20 75 | 70 20 74 68 65 20 76 61 |/ sets u|p the va|
|00000a50| 6c 75 65 73 20 6f 66 20 | 64 61 74 61 41 72 72 61 |lues of |dataArra|
|00000a60| 79 0d 7b 0d 09 64 6f 75 | 62 6c 65 09 6f 72 69 67 |y.{..dou|ble.orig|
|00000a70| 58 31 2c 20 6f 72 69 67 | 58 32 3b 0d 09 6c 6f 6e |X1, orig|X2;..lon|
|00000a80| 67 09 72 2c 20 63 3b 0d | 09 64 6f 75 62 6c 65 09 |g.r, c;.|.double.|
|00000a90| 78 2c 20 79 3b 0d 09 42 | 6f 6f 6c 65 61 6e 09 72 |x, y;..B|oolean.r|
|00000aa0| 65 74 76 61 6c 20 3d 20 | 66 61 6c 73 65 3b 0d 09 |etval = |false;..|
|00000ab0| 64 6f 75 62 6c 65 09 6d | 69 6e 20 3d 20 48 55 47 |double.m|in = HUG|
|00000ac0| 45 5f 56 41 4c 3b 0d 09 | 64 6f 75 62 6c 65 09 6d |E_VAL;..|double.m|
|00000ad0| 61 78 20 3d 20 2d 48 55 | 47 45 5f 56 41 4c 3b 0d |ax = -HU|GE_VAL;.|
|00000ae0| 09 64 6f 75 62 6c 65 09 | 78 4d 69 6e 2c 20 78 4d |.double.|xMin, xM|
|00000af0| 61 78 2c 20 79 4d 69 6e | 2c 20 79 4d 61 78 3b 0d |ax, yMin|, yMax;.|
|00000b00| 0d 09 47 65 74 47 72 61 | 66 52 61 6e 67 65 28 30 |..GetGra|fRange(0|
|00000b10| 2c 20 26 78 4d 69 6e 2c | 20 26 78 4d 61 78 29 3b |, &xMin,| &xMax);|
|00000b20| 0d 09 47 65 74 47 72 61 | 66 52 61 6e 67 65 28 31 |..GetGra|fRange(1|
|00000b30| 2c 20 26 79 4d 69 6e 2c | 20 26 79 4d 61 78 29 3b |, &yMin,| &yMax);|
|00000b40| 0d 0d 0d 09 69 66 20 28 | 78 50 61 72 61 6d 29 20 |....if (|xParam) |
|00000b50| 6f 72 69 67 58 31 20 3d | 20 47 65 74 46 75 6e 63 |origX1 =| GetFunc|
|00000b60| 74 69 6f 6e 50 61 72 61 | 6d 28 22 5c 70 22 2c 20 |tionPara|m("\p", |
|00000b70| 78 50 61 72 61 6d 29 3b | 09 2f 2f 20 73 61 76 65 |xParam);|.// save|
|00000b80| 20 63 75 72 72 65 6e 74 | 20 70 61 72 61 6d 73 20 | current| params |
|00000b90| 66 6f 72 20 72 65 73 74 | 6f 72 69 6e 67 20 74 68 |for rest|oring th|
|00000ba0| 65 6d 20 6c 61 74 65 72 | 0d 09 69 66 20 28 79 50 |em later|..if (yP|
|00000bb0| 61 72 61 6d 29 20 6f 72 | 69 67 58 32 20 3d 20 47 |aram) or|igX2 = G|
|00000bc0| 65 74 46 75 6e 63 74 69 | 6f 6e 50 61 72 61 6d 28 |etFuncti|onParam(|
|00000bd0| 22 5c 70 22 2c 20 79 50 | 61 72 61 6d 29 3b 09 2f |"\p", yP|aram);./|
|00000be0| 2f 20 73 61 76 65 20 63 | 75 72 72 65 6e 74 20 70 |/ save c|urrent p|
|00000bf0| 61 72 61 6d 73 20 66 6f | 72 20 72 65 73 74 6f 72 |arams fo|r restor|
|00000c00| 69 6e 67 20 74 68 65 6d | 20 6c 61 74 65 72 0d 0d |ing them| later..|
|00000c10| 09 69 66 20 28 64 61 74 | 61 41 72 72 61 79 20 21 |.if (dat|aArray !|
|00000c20| 3d 20 6e 69 6c 29 20 44 | 69 73 70 6f 73 65 48 61 |= nil) D|isposeHa|
|00000c30| 6e 64 6c 65 28 28 48 61 | 6e 64 6c 65 29 64 61 74 |ndle((Ha|ndle)dat|
|00000c40| 61 41 72 72 61 79 29 3b | 09 09 09 2f 2f 20 69 66 |aArray);|...// if|
|00000c50| 20 74 68 65 72 65 27 73 | 20 73 74 69 6c 6c 20 64 | there's| still d|
|00000c60| 61 74 61 20 69 6e 20 69 | 74 0d 0d 09 64 61 74 61 |ata in i|t...data|
|00000c70| 41 72 72 61 79 20 3d 20 | 28 41 72 72 61 79 45 6e |Array = |(ArrayEn|
|00000c80| 74 72 79 2a 2a 29 4e 65 | 77 48 61 6e 64 6c 65 43 |try**)Ne|wHandleC|
|00000c90| 6c 65 61 72 28 73 69 7a | 65 6f 66 28 41 72 72 61 |lear(siz|eof(Arra|
|00000ca0| 79 45 6e 74 72 79 29 2a | 78 52 65 73 2a 79 52 65 |yEntry)*|xRes*yRe|
|00000cb0| 73 29 3b 0d 09 69 66 20 | 28 64 61 74 61 41 72 72 |s);..if |(dataArr|
|00000cc0| 61 79 20 3d 3d 20 6e 69 | 6c 29 20 67 6f 74 6f 20 |ay == ni|l) goto |
|00000cd0| 64 6f 6e 65 3b 0d 09 48 | 4c 6f 63 6b 28 28 48 61 |done;..H|Lock((Ha|
|00000ce0| 6e 64 6c 65 29 64 61 74 | 61 41 72 72 61 79 29 3b |ndle)dat|aArray);|
|00000cf0| 0d 0d 09 64 61 74 61 44 | 58 20 3d 20 28 78 4d 61 |...dataD|X = (xMa|
|00000d00| 78 20 2d 20 78 4d 69 6e | 29 2f 28 78 52 65 73 2d |x - xMin|)/(xRes-|
|00000d10| 31 2e 30 30 30 30 30 30 | 30 30 30 31 29 3b 09 09 |1.000000|0001);..|
|00000d20| 2f 2f 20 74 68 65 20 63 | 6f 72 72 65 63 74 69 6f |// the c|orrectio|
|00000d30| 6e 20 28 30 2e 30 30 2e | 2e 30 31 29 20 6d 61 6b |n (0.00.|.01) mak|
|00000d40| 65 73 20 73 75 72 65 20 | 74 68 61 74 20 74 68 65 |es sure |that the|
|00000d50| 20 6c 61 73 74 20 70 6f | 69 6e 74 20 28 61 74 20 | last po|int (at |
|00000d60| 78 4d 61 78 29 20 69 73 | 20 75 73 65 64 20 61 73 |xMax) is| used as|
|00000d70| 20 77 65 6c 6c 0d 09 64 | 61 74 61 44 59 20 3d 20 | well..d|ataDY = |
|00000d80| 28 79 4d 61 78 20 2d 20 | 79 4d 69 6e 29 2f 28 79 |(yMax - |yMin)/(y|
|00000d90| 52 65 73 2d 31 2e 30 30 | 30 30 30 30 30 30 30 31 |Res-1.00|00000001|
|00000da0| 29 3b 0d 09 64 61 74 61 | 58 4d 69 6e 20 3d 20 78 |);..data|XMin = x|
|00000db0| 4d 69 6e 3b 20 64 61 74 | 61 59 4d 69 6e 20 3d 20 |Min; dat|aYMin = |
|00000dc0| 79 4d 69 6e 3b 0d 09 78 | 20 3d 20 64 61 74 61 58 |yMin;..x| = dataX|
|00000dd0| 4d 69 6e 3b 09 09 09 09 | 09 09 09 09 09 2f 2f 20 |Min;....|.....// |
|00000de0| 63 61 6c 63 75 6c 61 74 | 65 20 64 61 74 61 41 72 |calculat|e dataAr|
|00000df0| 72 61 79 0d 09 66 6f 72 | 20 28 63 3d 30 3b 20 63 |ray..for| (c=0; c|
|00000e00| 3c 78 52 65 73 3b 20 63 | 2b 2b 29 0d 09 7b 09 79 |<xRes; c|++)..{.y|
|00000e10| 20 3d 20 64 61 74 61 59 | 4d 69 6e 3b 0d 09 09 66 | = dataY|Min;...f|
|00000e20| 6f 72 20 28 72 3d 30 3b | 20 72 3c 79 52 65 73 3b |or (r=0;| r<yRes;|
|00000e30| 20 72 2b 2b 29 0d 09 09 | 7b 0d 09 09 09 41 72 72 | r++)...|{....Arr|
|00000e40| 61 79 45 6e 74 72 79 2a | 09 65 20 3d 20 44 61 74 |ayEntry*|.e = Dat|
|00000e50| 61 41 72 72 61 79 45 6c | 65 6d 65 6e 74 28 72 2c |aArrayEl|ement(r,|
|00000e60| 63 29 3b 0d 09 09 09 64 | 6f 75 62 6c 65 09 09 7a |c);....d|ouble..z|
|00000e70| 3b 0d 09 09 09 65 2d 3e | 76 61 6c 69 64 20 3d 20 |;....e->|valid = |
|00000e80| 4d 79 46 75 6e 63 74 69 | 6f 6e 28 78 2c 20 79 2c |MyFuncti|on(x, y,|
|00000e90| 20 26 7a 29 3b 0d 09 09 | 09 65 2d 3e 7a 20 3d 20 | &z);...|.e->z = |
|00000ea0| 7a 3b 0d 2f 2f 09 09 09 | 44 61 74 61 41 72 72 61 |z;.//...|DataArra|
|00000eb0| 79 45 6c 65 6d 65 6e 74 | 28 72 2c 20 63 29 2d 3e |yElement|(r, c)->|
|00000ec0| 7a 20 3d 20 7a 3b 0d 2f | 2f 09 09 09 53 65 74 44 |z = z;./|/...SetD|
|00000ed0| 61 74 61 41 72 72 61 79 | 28 72 2c 20 63 2c 20 7a |ataArray|(r, c, z|
|00000ee0| 29 3b 0d 09 09 09 79 20 | 2b 3d 20 64 61 74 61 44 |);....y |+= dataD|
|00000ef0| 59 3b 0d 09 09 09 69 66 | 20 28 65 2d 3e 76 61 6c |Y;....if| (e->val|
|00000f00| 69 64 29 0d 09 09 09 7b | 09 69 66 20 28 6d 69 6e |id)....{|.if (min|
|00000f10| 20 3e 20 7a 29 20 6d 69 | 6e 3d 7a 3b 0d 09 09 09 | > z) mi|n=z;....|
|00000f20| 09 69 66 20 28 6d 61 78 | 20 3c 20 7a 29 20 6d 61 |.if (max| < z) ma|
|00000f30| 78 3d 7a 3b 0d 09 09 09 | 7d 0d 09 09 7d 0d 09 09 |x=z;....|}...}...|
|00000f40| 78 20 2b 3d 20 64 61 74 | 61 44 58 3b 0d 09 7d 0d |x += dat|aDX;..}.|
|00000f50| 09 72 65 74 76 61 6c 20 | 3d 20 74 72 75 65 3b 0d |.retval |= true;.|
|00000f60| 09 69 66 20 28 7a 41 75 | 74 6f 6d 61 74 69 63 29 |.if (zAu|tomatic)|
|00000f70| 0d 09 7b 09 0d 09 09 69 | 66 20 28 6d 69 6e 20 3c |..{....i|f (min <|
|00000f80| 20 2d 31 65 31 30 30 29 | 20 6d 69 6e 20 3d 20 2d | -1e100)| min = -|
|00000f90| 31 65 31 30 30 3b 09 09 | 2f 2f 20 70 75 72 65 6c |1e100;..|// purel|
|00000fa0| 79 20 61 72 62 69 74 72 | 61 72 79 20 63 68 65 63 |y arbitr|ary chec|
|00000fb0| 6b 73 0d 09 09 69 66 20 | 28 6d 69 6e 20 3e 20 31 |ks...if |(min > 1|
|00000fc0| 65 31 30 30 29 20 6d 69 | 6e 20 3d 20 31 65 31 30 |e100) mi|n = 1e10|
|00000fd0| 30 3b 0d 09 09 69 66 20 | 28 6d 61 78 20 3c 20 2d |0;...if |(max < -|
|00000fe0| 31 65 31 30 30 29 20 6d | 61 78 20 3d 20 2d 31 65 |1e100) m|ax = -1e|
|00000ff0| 31 30 30 3b 0d 09 09 69 | 66 20 28 6d 61 78 20 3e |100;...i|f (max >|
|00001000| 20 31 65 31 30 30 29 20 | 6d 61 78 20 3d 20 31 65 | 1e100) |max = 1e|
|00001010| 31 30 30 3b 0d 09 09 69 | 66 20 28 6d 61 78 20 2d |100;...i|f (max -|
|00001020| 20 6d 69 6e 20 3c 20 31 | 65 2d 38 30 29 0d 09 09 | min < 1|e-80)...|
|00001030| 09 6d 61 78 20 3d 20 6d | 69 6e 20 2b 20 31 65 2d |.max = m|in + 1e-|
|00001040| 38 30 3b 0d 09 09 69 66 | 20 28 6d 61 78 20 2d 20 |80;...if| (max - |
|00001050| 6d 69 6e 20 3c 20 31 65 | 2d 38 30 29 0d 09 09 09 |min < 1e|-80)....|
|00001060| 6d 69 6e 20 3d 20 6d 61 | 78 20 2d 20 66 61 62 73 |min = ma|x - fabs|
|00001070| 28 6d 61 78 29 2a 30 2e | 31 3b 0d 09 09 0d 09 09 |(max)*0.|1;......|
|00001080| 53 65 74 47 72 61 66 52 | 61 6e 67 65 28 32 2c 20 |SetGrafR|ange(2, |
|00001090| 6d 69 6e 2c 20 6d 61 78 | 29 3b 0d 09 7d 0d 0d 64 |min, max|);..}..d|
|000010a0| 6f 6e 65 3a 0d 09 69 66 | 20 28 78 50 61 72 61 6d |one:..if| (xParam|
|000010b0| 29 20 53 65 74 46 75 6e | 63 74 69 6f 6e 50 61 72 |) SetFun|ctionPar|
|000010c0| 61 6d 28 22 5c 70 22 2c | 20 78 50 61 72 61 6d 2c |am("\p",| xParam,|
|000010d0| 20 6f 72 69 67 58 31 29 | 3b 09 2f 2f 20 72 65 73 | origX1)|;.// res|
|000010e0| 74 6f 72 65 20 70 61 72 | 61 6d 73 0d 09 69 66 20 |tore par|ams..if |
|000010f0| 28 79 50 61 72 61 6d 29 | 20 53 65 74 46 75 6e 63 |(yParam)| SetFunc|
|00001100| 74 69 6f 6e 50 61 72 61 | 6d 28 22 5c 70 22 2c 20 |tionPara|m("\p", |
|00001110| 79 50 61 72 61 6d 2c 20 | 6f 72 69 67 58 32 29 3b |yParam, |origX2);|
|00001120| 09 2f 2f 20 72 65 73 74 | 6f 72 65 20 70 61 72 61 |.// rest|ore para|
|00001130| 6d 73 0d 09 72 65 74 75 | 72 6e 20 72 65 74 76 61 |ms..retu|rn retva|
|00001140| 6c 3b 0d 7d 0d 0d 0d 23 | 70 72 61 67 6d 61 20 6d |l;.}...#|pragma m|
|00001150| 61 72 6b 20 2d 0d 0d 73 | 74 61 74 69 63 20 76 6f |ark -..s|tatic vo|
|00001160| 69 64 20 41 64 64 54 72 | 69 61 6e 67 6c 65 28 54 |id AddTr|iangle(T|
|00001170| 51 33 47 65 6f 6d 65 74 | 72 79 4f 62 6a 65 63 74 |Q3Geomet|ryObject|
|00001180| 20 6d 65 73 68 2c 20 41 | 72 72 61 79 45 6e 74 72 | mesh, A|rrayEntr|
|00001190| 79 2a 20 65 31 2c 20 41 | 72 72 61 79 45 6e 74 72 |y* e1, A|rrayEntr|
|000011a0| 79 2a 20 65 32 2c 20 41 | 72 72 61 79 45 6e 74 72 |y* e2, A|rrayEntr|
|000011b0| 79 2a 20 65 33 29 0d 09 | 2f 2f 20 61 64 64 73 20 |y* e3)..|// adds |
|000011c0| 61 20 74 72 69 61 6e 67 | 6c 65 20 74 6f 20 74 68 |a triang|le to th|
|000011d0| 65 20 6d 65 73 68 20 69 | 66 20 61 6c 6c 20 6d 65 |e mesh i|f all me|
|000011e0| 73 68 20 70 6f 69 6e 74 | 73 20 61 72 65 20 76 61 |sh point|s are va|
|000011f0| 6c 69 64 0d 7b 0d 09 54 | 51 33 4d 65 73 68 56 65 |lid.{..T|Q3MeshVe|
|00001200| 72 74 65 78 09 6d 65 73 | 68 56 65 72 74 69 63 65 |rtex.mes|hVertice|
|00001210| 73 5b 33 5d 3b 0d 0d 09 | 69 66 20 28 65 31 2d 3e |s[3];...|if (e1->|
|00001220| 76 61 6c 69 64 20 26 26 | 20 65 32 2d 3e 76 61 6c |valid &&| e2->val|
|00001230| 69 64 20 26 26 20 65 33 | 2d 3e 76 61 6c 69 64 29 |id && e3|->valid)|
|00001240| 0d 09 7b 0d 09 09 6d 65 | 73 68 56 65 72 74 69 63 |..{...me|shVertic|
|00001250| 65 73 5b 30 5d 20 3d 20 | 28 54 51 33 4d 65 73 68 |es[0] = |(TQ3Mesh|
|00001260| 56 65 72 74 65 78 29 65 | 31 2d 3e 6d 65 73 68 56 |Vertex)e|1->meshV|
|00001270| 65 72 74 65 78 3b 0d 09 | 09 6d 65 73 68 56 65 72 |ertex;..|.meshVer|
|00001280| 74 69 63 65 73 5b 31 5d | 20 3d 20 28 54 51 33 4d |tices[1]| = (TQ3M|
|00001290| 65 73 68 56 65 72 74 65 | 78 29 65 32 2d 3e 6d 65 |eshVerte|x)e2->me|
|000012a0| 73 68 56 65 72 74 65 78 | 3b 0d 09 09 6d 65 73 68 |shVertex|;...mesh|
|000012b0| 56 65 72 74 69 63 65 73 | 5b 32 5d 20 3d 20 28 54 |Vertices|[2] = (T|
|000012c0| 51 33 4d 65 73 68 56 65 | 72 74 65 78 29 65 33 2d |Q3MeshVe|rtex)e3-|
|000012d0| 3e 6d 65 73 68 56 65 72 | 74 65 78 3b 0d 09 09 51 |>meshVer|tex;...Q|
|000012e0| 33 4d 65 73 68 5f 46 61 | 63 65 4e 65 77 28 6d 65 |3Mesh_Fa|ceNew(me|
|000012f0| 73 68 2c 20 33 2c 20 6d | 65 73 68 56 65 72 74 69 |sh, 3, m|eshVerti|
|00001300| 63 65 73 2c 20 4e 55 4c | 4c 29 3b 0d 09 7d 0d 7d |ces, NUL|L);..}.}|
|00001310| 0d 0d 0d 54 51 33 47 65 | 6f 6d 65 74 72 79 4f 62 |...TQ3Ge|ometryOb|
|00001320| 6a 65 63 74 20 4d 61 6b | 65 53 75 72 66 61 63 65 |ject Mak|eSurface|
|00001330| 46 75 6e 63 74 69 6f 6e | 28 76 6f 69 64 29 0d 7b |Function|(void).{|
|00001340| 0d 09 54 51 33 47 65 6f | 6d 65 74 72 79 4f 62 6a |..TQ3Geo|metryObj|
|00001350| 65 63 74 09 6d 79 47 72 | 69 64 20 3d 20 4e 55 4c |ect.myGr|id = NUL|
|00001360| 4c 3b 0d 09 0d 0d 09 75 | 6e 73 69 67 6e 65 64 20 |L;.....u|nsigned |
|00001370| 6c 6f 6e 67 09 09 69 2c | 20 6a 3b 0d 09 64 6f 75 |long..i,| j;..dou|
|00001380| 62 6c 65 09 09 09 09 72 | 78 2c 20 72 79 3b 0d 0d |ble....r|x, ry;..|
|00001390| 0d 0d 09 2f 2f 20 63 72 | 65 61 74 65 20 74 68 65 |...// cr|eate the|
|000013a0| 20 67 72 69 64 3a 09 09 | 0d 09 09 09 0d 09 6d 79 | grid:..|......my|
|000013b0| 47 72 69 64 20 3d 20 51 | 33 4d 65 73 68 5f 4e 65 |Grid = Q|3Mesh_Ne|
|000013c0| 77 28 29 3b 09 09 09 09 | 09 09 09 09 2f 2f 20 63 |w();....|....// c|
|000013d0| 6f 6c 6c 65 63 74 20 74 | 68 65 20 67 72 69 64 20 |ollect t|he grid |
|000013e0| 69 6e 20 61 20 6d 65 73 | 68 0d 09 69 66 20 28 6d |in a mes|h..if (m|
|000013f0| 79 47 72 69 64 20 3d 3d | 20 4e 55 4c 4c 29 20 67 |yGrid ==| NULL) g|
|00001400| 6f 74 6f 20 65 78 69 74 | 3b 0d 09 51 33 4d 65 73 |oto exit|;..Q3Mes|
|00001410| 68 5f 44 65 6c 61 79 55 | 70 64 61 74 65 73 28 6d |h_DelayU|pdates(m|
|00001420| 79 47 72 69 64 29 3b 0d | 0d 09 2f 2f 20 61 64 64 |yGrid);.|..// add|
|00001430| 20 61 6c 6c 20 76 61 6c | 69 64 20 76 65 72 74 69 | all val|id verti|
|00001440| 63 65 73 0d 09 72 79 20 | 3d 20 64 61 74 61 59 4d |ces..ry |= dataYM|
|00001450| 69 6e 3b 0d 09 66 6f 72 | 20 28 69 20 3d 20 30 3b |in;..for| (i = 0;|
|00001460| 20 69 20 3c 20 79 52 65 | 73 3b 20 69 2b 2b 29 0d | i < yRe|s; i++).|
|00001470| 09 7b 0d 09 09 54 51 33 | 56 65 72 74 65 78 33 44 |.{...TQ3|Vertex3D|
|00001480| 09 76 3b 0d 09 09 76 2e | 61 74 74 72 69 62 75 74 |.v;...v.|attribut|
|00001490| 65 53 65 74 20 3d 20 4e | 55 4c 4c 3b 0d 09 09 72 |eSet = N|ULL;...r|
|000014a0| 78 20 3d 20 64 61 74 61 | 58 4d 69 6e 3b 0d 09 09 |x = data|XMin;...|
|000014b0| 66 6f 72 20 28 6a 20 3d | 20 30 3b 20 6a 20 3c 20 |for (j =| 0; j < |
|000014c0| 78 52 65 73 3b 20 6a 2b | 2b 29 0d 09 09 7b 0d 09 |xRes; j+|+)...{..|
|000014d0| 09 09 41 72 72 61 79 45 | 6e 74 72 79 2a 09 65 20 |..ArrayE|ntry*.e |
|000014e0| 3d 20 44 61 74 61 41 72 | 72 61 79 45 6c 65 6d 65 |= DataAr|rayEleme|
|000014f0| 6e 74 28 69 2c 6a 29 3b | 0d 0d 09 09 09 69 66 20 |nt(i,j);|.....if |
|00001500| 28 65 2d 3e 76 61 6c 69 | 64 29 0d 09 09 09 7b 09 |(e->vali|d)....{.|
|00001510| 65 2d 3e 76 61 6c 69 64 | 20 3d 20 53 63 61 6c 65 |e->valid| = Scale|
|00001520| 28 72 78 2c 72 79 2c 65 | 2d 3e 7a 2c 20 26 76 2e |(rx,ry,e|->z, &v.|
|00001530| 70 6f 69 6e 74 2e 78 2c | 26 76 2e 70 6f 69 6e 74 |point.x,|&v.point|
|00001540| 2e 79 2c 26 76 2e 70 6f | 69 6e 74 2e 7a 29 3b 09 |.y,&v.po|int.z);.|
|00001550| 09 2f 2f 20 63 6f 6e 76 | 65 72 74 20 74 6f 20 51 |.// conv|ert to Q|
|00001560| 44 33 44 20 63 6f 6f 72 | 64 69 6e 61 74 65 73 0d |D3D coor|dinates.|
|00001570| 09 09 09 09 69 66 20 28 | 65 2d 3e 76 61 6c 69 64 |....if (|e->valid|
|00001580| 29 0d 09 09 09 09 09 65 | 2d 3e 6d 65 73 68 56 65 |)......e|->meshVe|
|00001590| 72 74 65 78 20 3d 20 51 | 33 4d 65 73 68 5f 56 65 |rtex = Q|3Mesh_Ve|
|000015a0| 72 74 65 78 4e 65 77 28 | 6d 79 47 72 69 64 2c 20 |rtexNew(|myGrid, |
|000015b0| 26 76 29 3b 0d 09 09 09 | 7d 0d 0d 09 09 09 72 78 |&v);....|}.....rx|
|000015c0| 20 2b 3d 20 64 61 74 61 | 44 58 3b 0d 09 09 7d 0d | += data|DX;...}.|
|000015d0| 09 09 72 79 20 2b 3d 20 | 64 61 74 61 44 59 3b 0d |..ry += |dataDY;.|
|000015e0| 09 7d 0d 0d 09 2f 2f 20 | 63 72 65 61 74 65 20 74 |.}...// |create t|
|000015f0| 72 69 61 6e 67 6c 65 73 | 20 62 65 74 77 65 65 6e |riangles| between|
|00001600| 20 74 68 65 20 76 61 6c | 69 64 20 76 65 72 74 69 | the val|id verti|
|00001610| 63 65 73 0d 09 66 6f 72 | 20 28 69 20 3d 20 30 3b |ces..for| (i = 0;|
|00001620| 20 69 20 3c 20 79 52 65 | 73 2d 31 3b 20 69 2b 2b | i < yRe|s-1; i++|
|00001630| 29 0d 09 7b 0d 09 09 47 | 65 74 47 72 61 66 52 61 |)..{...G|etGrafRa|
|00001640| 6e 67 65 28 30 2c 20 26 | 72 78 2c 20 6e 69 6c 29 |nge(0, &|rx, nil)|
|00001650| 3b 0d 09 09 66 6f 72 20 | 28 6a 20 3d 20 30 3b 20 |;...for |(j = 0; |
|00001660| 6a 20 3c 20 78 52 65 73 | 2d 31 3b 20 6a 2b 2b 29 |j < xRes|-1; j++)|
|00001670| 0d 09 09 7b 0d 09 09 09 | 41 72 72 61 79 45 6e 74 |...{....|ArrayEnt|
|00001680| 72 79 2a 09 65 30 30 20 | 3d 20 44 61 74 61 41 72 |ry*.e00 |= DataAr|
|00001690| 72 61 79 45 6c 65 6d 65 | 6e 74 28 69 2c 6a 29 3b |rayEleme|nt(i,j);|
|000016a0| 0d 09 09 09 41 72 72 61 | 79 45 6e 74 72 79 2a 09 |....Arra|yEntry*.|
|000016b0| 65 30 31 20 3d 20 44 61 | 74 61 41 72 72 61 79 45 |e01 = Da|taArrayE|
|000016c0| 6c 65 6d 65 6e 74 28 69 | 2c 6a 2b 31 29 3b 0d 09 |lement(i|,j+1);..|
|000016d0| 09 09 41 72 72 61 79 45 | 6e 74 72 79 2a 09 65 31 |..ArrayE|ntry*.e1|
|000016e0| 30 20 3d 20 44 61 74 61 | 41 72 72 61 79 45 6c 65 |0 = Data|ArrayEle|
|000016f0| 6d 65 6e 74 28 69 2b 31 | 2c 6a 29 3b 0d 09 09 09 |ment(i+1|,j);....|
|00001700| 41 72 72 61 79 45 6e 74 | 72 79 2a 09 65 31 31 20 |ArrayEnt|ry*.e11 |
|00001710| 3d 20 44 61 74 61 41 72 | 72 61 79 45 6c 65 6d 65 |= DataAr|rayEleme|
|00001720| 6e 74 28 69 2b 31 2c 6a | 2b 31 29 3b 0d 0d 09 09 |nt(i+1,j|+1);....|
|00001730| 09 69 66 20 28 65 30 30 | 2d 3e 76 61 6c 69 64 20 |.if (e00|->valid |
|00001740| 26 26 20 65 30 31 2d 3e | 76 61 6c 69 64 20 26 26 |&& e01->|valid &&|
|00001750| 20 65 31 30 2d 3e 76 61 | 6c 69 64 20 26 26 20 65 | e10->va|lid && e|
|00001760| 31 31 2d 3e 76 61 6c 69 | 64 29 0d 09 09 09 7b 0d |11->vali|d)....{.|
|00001770| 09 09 09 09 41 64 64 54 | 72 69 61 6e 67 6c 65 28 |....AddT|riangle(|
|00001780| 6d 79 47 72 69 64 2c 20 | 65 30 30 2c 20 65 30 31 |myGrid, |e00, e01|
|00001790| 2c 20 65 31 30 29 3b 0d | 09 09 09 09 41 64 64 54 |, e10);.|....AddT|
|000017a0| 72 69 61 6e 67 6c 65 28 | 6d 79 47 72 69 64 2c 20 |riangle(|myGrid, |
|000017b0| 65 31 30 2c 20 65 30 31 | 2c 20 65 31 31 29 3b 0d |e10, e01|, e11);.|
|000017c0| 09 09 09 7d 0d 09 09 09 | 65 6c 73 65 0d 09 09 09 |...}....|else....|
|000017d0| 7b 09 41 64 64 54 72 69 | 61 6e 67 6c 65 28 6d 79 |{.AddTri|angle(my|
|000017e0| 47 72 69 64 2c 20 65 30 | 30 2c 20 65 30 31 2c 20 |Grid, e0|0, e01, |
|000017f0| 65 31 30 29 3b 0d 09 09 | 09 09 41 64 64 54 72 69 |e10);...|..AddTri|
|00001800| 61 6e 67 6c 65 28 6d 79 | 47 72 69 64 2c 20 65 30 |angle(my|Grid, e0|
|00001810| 31 2c 20 65 31 30 2c 20 | 65 31 31 29 3b 0d 09 09 |1, e10, |e11);...|
|00001820| 09 09 41 64 64 54 72 69 | 61 6e 67 6c 65 28 6d 79 |..AddTri|angle(my|
|00001830| 47 72 69 64 2c 20 65 31 | 30 2c 20 65 31 31 2c 20 |Grid, e1|0, e11, |
|00001840| 65 30 30 29 3b 0d 09 09 | 09 09 41 64 64 54 72 69 |e00);...|..AddTri|
|00001850| 61 6e 67 6c 65 28 6d 79 | 47 72 69 64 2c 20 65 31 |angle(my|Grid, e1|
|00001860| 31 2c 20 65 30 30 2c 20 | 65 30 31 29 3b 0d 09 09 |1, e00, |e01);...|
|00001870| 09 7d 0d 0d 09 09 7d 0d | 09 7d 0d 0d 09 51 33 4d |.}....}.|.}...Q3M|
|00001880| 65 73 68 5f 52 65 73 75 | 6d 65 55 70 64 61 74 65 |esh_Resu|meUpdate|
|00001890| 73 28 6d 79 47 72 69 64 | 29 3b 0d 0d 0d 65 78 69 |s(myGrid|);...exi|
|000018a0| 74 3a 0d 09 72 65 74 75 | 72 6e 20 6d 79 47 72 69 |t:..retu|rn myGri|
|000018b0| 64 3b 0d 7d 0d 0d 23 70 | 72 61 67 6d 61 20 6d 61 |d;.}..#p|ragma ma|
|000018c0| 72 6b 20 2d 0d 0d 65 6e | 75 6d 20 7b 0d 09 78 50 |rk -..en|um {..xP|
|000018d0| 6f 70 75 70 49 74 65 6d | 20 3d 20 33 2c 0d 09 78 |opupItem| = 3,..x|
|000018e0| 46 72 6f 6d 49 74 65 6d | 20 3d 20 35 2c 0d 09 78 |FromItem| = 5,..x|
|000018f0| 54 6f 49 74 65 6d 20 3d | 20 37 2c 0d 09 78 52 65 |ToItem =| 7,..xRe|
|00001900| 73 49 74 65 6d 20 3d 20 | 31 34 2c 0d 09 79 50 6f |sItem = |14,..yPo|
|00001910| 70 75 70 49 74 65 6d 20 | 3d 20 38 2c 0d 09 79 46 |pupItem |= 8,..yF|
|00001920| 72 6f 6d 49 74 65 6d 20 | 3d 20 31 30 2c 0d 09 79 |romItem |= 10,..y|
|00001930| 54 6f 49 74 65 6d 20 3d | 20 31 32 2c 0d 09 79 52 |ToItem =| 12,..yR|
|00001940| 65 73 49 74 65 6d 20 3d | 20 31 36 2c 0d 09 7a 41 |esItem =| 16,..zA|
|00001950| 75 74 6f 6d 61 74 69 63 | 49 74 65 6d 20 3d 20 31 |utomatic|Item = 1|
|00001960| 39 2c 0d 09 7a 46 72 6f | 6d 54 69 74 6c 65 49 74 |9,..zFro|mTitleIt|
|00001970| 65 6d 20 3d 20 32 30 2c | 0d 09 7a 46 72 6f 6d 49 |em = 20,|..zFromI|
|00001980| 74 65 6d 2c 0d 09 7a 54 | 6f 54 69 74 6c 65 49 74 |tem,..zT|oTitleIt|
|00001990| 65 6d 2c 0d 09 7a 54 6f | 49 74 65 6d 2c 0d 09 68 |em,..zTo|Item,..h|
|000019a0| 65 6c 70 42 75 74 74 6f | 6e 49 74 65 6d 20 3d 20 |elpButto|nItem = |
|000019b0| 31 37 0d 09 7d 3b 0d 0d | 73 74 61 74 69 63 20 76 |17..};..|static v|
|000019c0| 6f 69 64 20 43 72 65 61 | 74 65 50 61 72 61 6d 50 |oid Crea|teParamP|
|000019d0| 6f 70 75 70 28 44 69 61 | 6c 6f 67 44 61 74 61 2a |opup(Dia|logData*|
|000019e0| 20 64 6c 67 2c 20 73 68 | 6f 72 74 20 69 74 65 6d | dlg, sh|ort item|
|000019f0| 49 44 2c 20 73 68 6f 72 | 74 20 76 61 6c 75 65 29 |ID, shor|t value)|
|00001a00| 0d 09 2f 2f 20 63 72 65 | 61 74 65 73 20 61 20 70 |..// cre|ates a p|
|00001a10| 6f 70 75 70 20 66 6f 72 | 20 78 2c 20 58 32 0d 7b |opup for| x, X2.{|
|00001a20| 0d 09 4d 65 6e 75 48 61 | 6e 64 6c 65 09 09 6d 65 |..MenuHa|ndle..me|
|00001a30| 6e 75 3b 0d 09 73 68 6f | 72 74 09 09 09 69 2c 20 |nu;..sho|rt...i, |
|00001a40| 6e 72 50 61 72 61 6d 73 | 3b 0d 09 53 74 72 32 35 |nrParams|;..Str25|
|00001a50| 35 09 09 09 6e 61 6d 65 | 3b 0d 09 43 6f 6e 74 72 |5...name|;..Contr|
|00001a60| 6f 6c 48 61 6e 64 6c 65 | 09 63 6f 6e 74 72 6f 6c |olHandle|.control|
|00001a70| 20 3d 20 28 43 6f 6e 74 | 72 6f 6c 48 61 6e 64 6c | = (Cont|rolHandl|
|00001a80| 65 29 4d 79 47 65 74 49 | 74 65 6d 48 61 6e 64 6c |e)MyGetI|temHandl|
|00001a90| 65 28 64 6c 67 2c 69 74 | 65 6d 49 44 29 3b 0d 09 |e(dlg,it|emID);..|
|00001aa0| 69 66 20 28 63 6f 6e 74 | 72 6f 6c 3d 3d 6e 69 6c |if (cont|rol==nil|
|00001ab0| 29 20 72 65 74 75 72 6e | 3b 09 09 09 09 09 09 09 |) return|;.......|
|00001ac0| 2f 2f 20 73 68 6f 75 6c | 64 20 6e 65 76 65 72 20 |// shoul|d never |
|00001ad0| 68 61 70 70 65 6e 0d 09 | 6d 65 6e 75 20 3d 20 28 |happen..|menu = (|
|00001ae0| 2a 2a 28 50 6f 70 75 70 | 50 72 69 76 61 74 65 44 |**(Popup|PrivateD|
|00001af0| 61 74 61 2a 2a 29 28 2a | 2a 63 6f 6e 74 72 6f 6c |ata**)(*|*control|
|00001b00| 29 2e 63 6f 6e 74 72 6c | 44 61 74 61 29 2e 6d 48 |).contrl|Data).mH|
|00001b10| 61 6e 64 6c 65 3b 0d 09 | 69 66 20 28 6d 65 6e 75 |andle;..|if (menu|
|00001b20| 3d 3d 6e 69 6c 29 20 72 | 65 74 75 72 6e 3b 09 09 |==nil) r|eturn;..|
|00001b30| 09 09 09 09 09 09 2f 2f | 20 73 68 6f 75 6c 64 20 |......//| should |
|00001b40| 6e 65 76 65 72 20 68 61 | 70 70 65 6e 0d 09 6e 72 |never ha|ppen..nr|
|00001b50| 50 61 72 61 6d 73 20 3d | 20 47 65 74 4e 75 6d 46 |Params =| GetNumF|
|00001b60| 75 6e 63 74 69 6f 6e 50 | 61 72 61 6d 73 28 22 5c |unctionP|arams("\|
|00001b70| 70 22 29 3b 09 09 09 09 | 2f 2f 20 6e 75 6d 62 65 |p");....|// numbe|
|00001b80| 72 20 6f 66 20 70 61 72 | 61 6d 65 74 65 72 73 20 |r of par|ameters |
|00001b90| 6f 66 20 63 75 72 72 65 | 6e 74 20 66 75 6e 63 74 |of curre|nt funct|
|00001ba0| 69 6f 6e 0d 09 66 6f 72 | 20 28 69 3d 31 3b 20 69 |ion..for| (i=1; i|
|00001bb0| 3c 3d 6e 72 50 61 72 61 | 6d 73 3b 20 69 2b 2b 29 |<=nrPara|ms; i++)|
|00001bc0| 0d 09 7b 0d 09 09 47 65 | 74 46 75 6e 63 74 69 6f |..{...Ge|tFunctio|
|00001bd0| 6e 50 61 72 61 6d 4e 61 | 6d 65 28 22 5c 70 22 2c |nParamNa|me("\p",|
|00001be0| 69 2c 6e 61 6d 65 29 3b | 0d 09 09 41 64 64 49 74 |i,name);|...AddIt|
|00001bf0| 65 6d 54 6f 4d 65 6e 75 | 28 6d 65 6e 75 2c 20 6e |emToMenu|(menu, n|
|00001c00| 61 6d 65 29 3b 0d 09 7d | 0d 09 53 65 74 43 6f 6e |ame);..}|..SetCon|
|00001c10| 74 72 6f 6c 4d 61 78 69 | 6d 75 6d 28 63 6f 6e 74 |trolMaxi|mum(cont|
|00001c20| 72 6f 6c 2c 20 6e 72 50 | 61 72 61 6d 73 2b 32 29 |rol, nrP|arams+2)|
|00001c30| 3b 0d 09 69 66 20 28 76 | 61 6c 75 65 20 3e 20 6e |;..if (v|alue > n|
|00001c40| 72 50 61 72 61 6d 73 29 | 20 76 61 6c 75 65 20 3d |rParams)| value =|
|00001c50| 20 6e 72 50 61 72 61 6d | 73 3b 0d 09 53 65 74 43 | nrParam|s;..SetC|
|00001c60| 6f 6e 74 72 6f 6c 56 61 | 6c 75 65 28 63 6f 6e 74 |ontrolVa|lue(cont|
|00001c70| 72 6f 6c 2c 20 76 61 6c | 75 65 3f 20 76 61 6c 75 |rol, val|ue? valu|
|00001c80| 65 2b 32 3a 20 76 61 6c | 75 65 2b 31 29 3b 0d 7d |e+2: val|ue+1);.}|
|00001c90| 0d 0d 73 74 61 74 69 63 | 20 73 68 6f 72 74 20 47 |..static| short G|
|00001ca0| 65 74 50 61 72 61 6d 50 | 6f 70 75 70 28 44 69 61 |etParamP|opup(Dia|
|00001cb0| 6c 6f 67 44 61 74 61 2a | 20 64 6c 67 2c 20 73 68 |logData*| dlg, sh|
|00001cc0| 6f 72 74 20 69 74 65 6d | 49 44 29 0d 7b 0d 09 73 |ort item|ID).{..s|
|00001cd0| 68 6f 72 74 09 76 61 6c | 75 65 20 3d 20 4d 79 47 |hort.val|ue = MyG|
|00001ce0| 65 74 49 74 65 6d 56 61 | 6c 75 65 28 64 6c 67 2c |etItemVa|lue(dlg,|
|00001cf0| 20 69 74 65 6d 49 44 29 | 3b 0d 09 69 66 20 28 76 | itemID)|;..if (v|
|00001d00| 61 6c 75 65 20 3e 20 31 | 29 20 72 65 74 75 72 6e |alue > 1|) return|
|00001d10| 20 76 61 6c 75 65 2d 32 | 3b 0d 09 65 6c 73 65 20 | value-2|;..else |
|00001d20| 72 65 74 75 72 6e 20 76 | 61 6c 75 65 2d 31 3b 0d |return v|alue-1;.|
|00001d30| 7d 0d 0d 73 74 61 74 69 | 63 20 42 6f 6f 6c 65 61 |}..stati|c Boolea|
|00001d40| 6e 20 47 65 74 52 65 73 | 6f 6c 75 74 69 6f 6e 28 |n GetRes|olution(|
|00001d50| 44 69 61 6c 6f 67 44 61 | 74 61 2a 20 64 6c 67 2c |DialogDa|ta* dlg,|
|00001d60| 20 73 68 6f 72 74 20 69 | 74 65 6d 49 44 2c 20 6c | short i|temID, l|
|00001d70| 6f 6e 67 2a 20 63 6f 6e | 73 74 20 76 61 6c 75 65 |ong* con|st value|
|00001d80| 29 0d 7b 0d 09 6c 6f 6e | 67 20 76 61 6c 3b 0d 09 |).{..lon|g val;..|
|00001d90| 69 66 20 28 4d 79 47 65 | 74 4c 6f 6e 67 49 74 65 |if (MyGe|tLongIte|
|00001da0| 6d 28 64 6c 67 2c 20 69 | 74 65 6d 49 44 2c 20 26 |m(dlg, i|temID, &|
|00001db0| 76 61 6c 29 20 3d 3d 20 | 66 61 6c 73 65 29 20 72 |val) == |false) r|
|00001dc0| 65 74 75 72 6e 20 66 61 | 6c 73 65 3b 0d 09 69 66 |eturn fa|lse;..if|
|00001dd0| 20 28 76 61 6c 20 3c 20 | 32 20 7c 7c 20 76 61 6c | (val < |2 || val|
|00001de0| 20 3e 20 31 30 30 30 30 | 29 0d 09 7b 09 4d 79 53 | > 10000|)..{.MyS|
|00001df0| 65 6c 65 63 74 49 74 65 | 6d 54 65 78 74 28 64 6c |electIte|mText(dl|
|00001e00| 67 2c 20 69 74 65 6d 49 | 44 2c 20 30 2c 20 30 78 |g, itemI|D, 0, 0x|
|00001e10| 37 46 46 46 29 3b 0d 09 | 09 53 79 73 42 65 65 70 |7FFF);..|.SysBeep|
|00001e20| 28 33 30 29 3b 0d 09 09 | 72 65 74 75 72 6e 20 66 |(30);...|return f|
|00001e30| 61 6c 73 65 3b 0d 09 7d | 0d 09 2a 76 61 6c 75 65 |alse;..}|..*value|
|00001e40| 20 3d 20 76 61 6c 3b 0d | 09 72 65 74 75 72 6e 20 | = val;.|.return |
|00001e50| 74 72 75 65 3b 0d 7d 0d | 0d 73 74 61 74 69 63 20 |true;.}.|.static |
|00001e60| 76 6f 69 64 20 53 68 6f | 77 48 69 64 65 49 74 65 |void Sho|wHideIte|
|00001e70| 6d 73 28 44 69 61 6c 6f | 67 44 61 74 61 2a 20 63 |ms(Dialo|gData* c|
|00001e80| 6f 6e 73 74 20 64 6c 67 | 29 0d 09 2f 2f 20 73 68 |onst dlg|)..// sh|
|00001e90| 6f 77 73 20 61 6e 64 20 | 68 69 64 65 73 20 74 68 |ows and |hides th|
|00001ea0| 65 20 69 74 65 6d 73 20 | 69 6e 20 74 68 65 20 6c |e items |in the l|
|00001eb0| 6f 77 65 72 20 70 61 72 | 74 20 6f 66 20 74 68 65 |ower par|t of the|
|00001ec0| 20 64 69 61 6c 6f 67 0d | 7b 0d 09 73 74 61 74 69 | dialog.|{..stati|
|00001ed0| 63 20 63 6f 6e 73 74 20 | 63 68 61 72 20 69 74 65 |c const |char ite|
|00001ee0| 6d 4c 69 73 74 5b 5d 20 | 3d 20 7b 7a 46 72 6f 6d |mList[] |= {zFrom|
|00001ef0| 54 69 74 6c 65 49 74 65 | 6d 2c 20 7a 46 72 6f 6d |TitleIte|m, zFrom|
|00001f00| 49 74 65 6d 2c 0d 09 09 | 09 7a 54 6f 54 69 74 6c |Item,...|.zToTitl|
|00001f10| 65 49 74 65 6d 2c 20 7a | 54 6f 49 74 65 6d 2c 20 |eItem, z|ToItem, |
|00001f20| 30 7d 3b 0d 0d 09 63 68 | 61 72 2a 09 70 20 3d 20 |0};...ch|ar*.p = |
|00001f30| 28 63 68 61 72 2a 29 69 | 74 65 6d 4c 69 73 74 3b |(char*)i|temList;|
|00001f40| 0d 0d 09 69 66 20 28 4d | 79 47 65 74 49 74 65 6d |...if (M|yGetItem|
|00001f50| 56 61 6c 75 65 28 64 6c | 67 2c 20 7a 41 75 74 6f |Value(dl|g, zAuto|
|00001f60| 6d 61 74 69 63 49 74 65 | 6d 29 29 0d 09 09 77 68 |maticIte|m))...wh|
|00001f70| 69 6c 65 20 28 2a 70 29 | 20 4d 79 48 69 64 65 49 |ile (*p)| MyHideI|
|00001f80| 74 65 6d 28 64 6c 67 2c | 20 2a 70 2b 2b 29 3b 0d |tem(dlg,| *p++);.|
|00001f90| 09 65 6c 73 65 0d 09 09 | 77 68 69 6c 65 20 28 2a |.else...|while (*|
|00001fa0| 70 29 20 4d 79 53 68 6f | 77 49 74 65 6d 28 64 6c |p) MySho|wItem(dl|
|00001fb0| 67 2c 20 2a 70 2b 2b 29 | 3b 0d 7d 0d 0d 0d 42 6f |g, *p++)|;.}...Bo|
|00001fc0| 6f 6c 65 61 6e 20 44 69 | 61 6c 6f 67 50 6c 6f 74 |olean Di|alogPlot|
|00001fd0| 46 75 6e 63 74 69 6f 6e | 28 76 6f 69 64 29 0d 09 |Function|(void)..|
|00001fe0| 2f 2f 20 64 6f 65 73 20 | 74 68 65 20 73 65 74 75 |// does |the setu|
|00001ff0| 70 20 64 69 61 6c 6f 67 | 0d 09 2f 2f 20 72 65 74 |p dialog|..// ret|
|00002000| 75 72 6e 73 20 74 72 75 | 65 20 69 66 20 4f 4b 2c |urns tru|e if OK,|
|00002010| 20 66 61 6c 73 65 20 69 | 66 20 63 61 6e 63 65 6c | false i|f cancel|
|00002020| 6c 65 64 0d 7b 0d 09 44 | 69 61 6c 6f 67 44 61 74 |led.{..D|ialogDat|
|00002030| 61 2a 09 64 6c 67 3b 0d | 09 73 68 6f 72 74 09 09 |a*.dlg;.|.short..|
|00002040| 69 74 65 6d 48 69 74 3b | 0d 09 42 6f 6f 6c 65 61 |itemHit;|..Boolea|
|00002050| 6e 09 09 72 65 74 76 61 | 6c 20 3d 20 66 61 6c 73 |n..retva|l = fals|
|00002060| 65 3b 0d 09 64 6f 75 62 | 6c 65 09 09 78 4d 69 6e |e;..doub|le..xMin|
|00002070| 2c 20 78 4d 61 78 2c 20 | 79 4d 69 6e 2c 20 79 4d |, xMax, |yMin, yM|
|00002080| 61 78 2c 20 7a 4d 69 6e | 2c 20 7a 4d 61 78 3b 0d |ax, zMin|, zMax;.|
|00002090| 0d 09 47 65 74 47 72 61 | 66 52 61 6e 67 65 28 30 |..GetGra|fRange(0|
|000020a0| 2c 20 26 78 4d 69 6e 2c | 20 26 78 4d 61 78 29 3b |, &xMin,| &xMax);|
|000020b0| 0d 09 47 65 74 47 72 61 | 66 52 61 6e 67 65 28 31 |..GetGra|fRange(1|
|000020c0| 2c 20 26 79 4d 69 6e 2c | 20 26 79 4d 61 78 29 3b |, &yMin,| &yMax);|
|000020d0| 0d 09 47 65 74 47 72 61 | 66 52 61 6e 67 65 28 32 |..GetGra|fRange(2|
|000020e0| 2c 20 26 7a 4d 69 6e 2c | 20 26 7a 4d 61 78 29 3b |, &zMin,| &zMax);|
|000020f0| 0d 0d 09 64 6c 67 20 3d | 20 4d 79 47 65 74 4e 65 |...dlg =| MyGetNe|
|00002100| 77 44 69 61 6c 6f 67 28 | 33 30 30 30 30 2c 20 31 |wDialog(|30000, 1|
|00002110| 2c 20 32 29 3b 0d 09 69 | 66 20 28 64 6c 67 20 3d |, 2);..i|f (dlg =|
|00002120| 3d 20 6e 69 6c 29 0d 09 | 09 67 6f 74 6f 20 64 6f |= nil)..|.goto do|
|00002130| 6e 65 3b 0d 0d 09 4d 79 | 53 65 74 45 78 74 65 6e |ne;...My|SetExten|
|00002140| 64 65 64 49 74 65 6d 28 | 64 6c 67 2c 20 78 46 72 |dedItem(|dlg, xFr|
|00002150| 6f 6d 49 74 65 6d 2c 20 | 78 4d 69 6e 29 3b 0d 09 |omItem, |xMin);..|
|00002160| 4d 79 53 65 74 45 78 74 | 65 6e 64 65 64 49 74 65 |MySetExt|endedIte|
|00002170| 6d 28 64 6c 67 2c 20 78 | 54 6f 49 74 65 6d 2c 20 |m(dlg, x|ToItem, |
|00002180| 78 4d 61 78 29 3b 0d 09 | 4d 79 53 65 74 45 78 74 |xMax);..|MySetExt|
|00002190| 65 6e 64 65 64 49 74 65 | 6d 28 64 6c 67 2c 20 79 |endedIte|m(dlg, y|
|000021a0| 46 72 6f 6d 49 74 65 6d | 2c 20 79 4d 69 6e 29 3b |FromItem|, yMin);|
|000021b0| 0d 09 4d 79 53 65 74 45 | 78 74 65 6e 64 65 64 49 |..MySetE|xtendedI|
|000021c0| 74 65 6d 28 64 6c 67 2c | 20 79 54 6f 49 74 65 6d |tem(dlg,| yToItem|
|000021d0| 2c 20 79 4d 61 78 29 3b | 0d 09 4d 79 53 65 74 45 |, yMax);|..MySetE|
|000021e0| 78 74 65 6e 64 65 64 49 | 74 65 6d 28 64 6c 67 2c |xtendedI|tem(dlg,|
|000021f0| 20 7a 46 72 6f 6d 49 74 | 65 6d 2c 20 7a 4d 69 6e | zFromIt|em, zMin|
|00002200| 29 3b 0d 09 4d 79 53 65 | 74 45 78 74 65 6e 64 65 |);..MySe|tExtende|
|00002210| 64 49 74 65 6d 28 64 6c | 67 2c 20 7a 54 6f 49 74 |dItem(dl|g, zToIt|
|00002220| 65 6d 2c 20 7a 4d 61 78 | 29 3b 0d 09 4d 79 53 65 |em, zMax|);..MySe|
|00002230| 74 4c 6f 6e 67 49 74 65 | 6d 28 64 6c 67 2c 20 78 |tLongIte|m(dlg, x|
|00002240| 52 65 73 49 74 65 6d 2c | 20 78 52 65 73 29 3b 0d |ResItem,| xRes);.|
|00002250| 09 4d 79 53 65 74 4c 6f | 6e 67 49 74 65 6d 28 64 |.MySetLo|ngItem(d|
|00002260| 6c 67 2c 20 79 52 65 73 | 49 74 65 6d 2c 20 79 52 |lg, yRes|Item, yR|
|00002270| 65 73 29 3b 0d 09 43 72 | 65 61 74 65 50 61 72 61 |es);..Cr|eatePara|
|00002280| 6d 50 6f 70 75 70 28 64 | 6c 67 2c 20 78 50 6f 70 |mPopup(d|lg, xPop|
|00002290| 75 70 49 74 65 6d 2c 20 | 78 50 61 72 61 6d 29 3b |upItem, |xParam);|
|000022a0| 0d 09 43 72 65 61 74 65 | 50 61 72 61 6d 50 6f 70 |..Create|ParamPop|
|000022b0| 75 70 28 64 6c 67 2c 20 | 79 50 6f 70 75 70 49 74 |up(dlg, |yPopupIt|
|000022c0| 65 6d 2c 20 79 50 61 72 | 61 6d 29 3b 0d 09 4d 79 |em, yPar|am);..My|
|000022d0| 53 65 74 49 74 65 6d 56 | 61 6c 75 65 28 64 6c 67 |SetItemV|alue(dlg|
|000022e0| 2c 20 7a 41 75 74 6f 6d | 61 74 69 63 49 74 65 6d |, zAutom|aticItem|
|000022f0| 2c 20 7a 41 75 74 6f 6d | 61 74 69 63 29 3b 0d 0d |, zAutom|atic);..|
|00002300| 09 53 68 6f 77 48 69 64 | 65 49 74 65 6d 73 28 64 |.ShowHid|eItems(d|
|00002310| 6c 67 29 3b 0d 09 4d 79 | 53 65 6c 65 63 74 49 74 |lg);..My|SelectIt|
|00002320| 65 6d 54 65 78 74 28 64 | 6c 67 2c 20 78 46 72 6f |emText(d|lg, xFro|
|00002330| 6d 49 74 65 6d 2c 20 30 | 2c 20 30 78 37 46 46 46 |mItem, 0|, 0x7FFF|
|00002340| 29 3b 0d 09 53 65 74 47 | 6c 6f 62 61 6c 57 69 6e |);..SetG|lobalWin|
|00002350| 64 6f 77 52 65 63 74 28 | 64 6c 67 2d 3e 64 69 61 |dowRect(|dlg->dia|
|00002360| 6c 6f 67 2c 20 26 73 65 | 74 75 70 44 69 61 6c 6f |log, &se|tupDialo|
|00002370| 67 52 65 63 74 29 3b 0d | 09 4d 79 53 68 6f 77 44 |gRect);.|.MyShowD|
|00002380| 69 61 6c 6f 67 28 64 6c | 67 29 3b 0d 09 64 6f 0d |ialog(dl|g);..do.|
|00002390| 09 7b 0d 09 09 4d 79 4d | 6f 64 61 6c 44 69 61 6c |.{...MyM|odalDial|
|000023a0| 6f 67 28 64 6c 67 2c 20 | 26 69 74 65 6d 48 69 74 |og(dlg, |&itemHit|
|000023b0| 29 3b 0d 0d 09 09 73 77 | 69 74 63 68 28 69 74 65 |);....sw|itch(ite|
|000023c0| 6d 48 69 74 29 0d 09 09 | 7b 0d 0d 09 09 63 61 73 |mHit)...|{....cas|
|000023d0| 65 20 7a 41 75 74 6f 6d | 61 74 69 63 49 74 65 6d |e zAutom|aticItem|
|000023e0| 3a 0d 09 09 09 09 53 68 | 6f 77 48 69 64 65 49 74 |:.....Sh|owHideIt|
|000023f0| 65 6d 73 28 64 6c 67 29 | 3b 0d 09 09 09 09 62 72 |ems(dlg)|;.....br|
|00002400| 65 61 6b 3b 0d 09 09 63 | 61 73 65 20 68 65 6c 70 |eak;...c|ase help|
|00002410| 42 75 74 74 6f 6e 49 74 | 65 6d 3a 0d 09 09 09 09 |ButtonIt|em:.....|
|00002420| 4d 79 50 6f 73 69 74 69 | 6f 6e 65 64 41 6c 65 72 |MyPositi|onedAler|
|00002430| 74 28 33 30 30 30 33 2c | 20 26 68 65 6c 70 44 69 |t(30003,| &helpDi|
|00002440| 61 6c 6f 67 52 65 63 74 | 29 3b 0d 09 09 09 09 62 |alogRect|);.....b|
|00002450| 72 65 61 6b 3b 0d 09 09 | 63 61 73 65 20 6f 6b 3a |reak;...|case ok:|
|00002460| 0d 09 09 09 7b 0d 09 09 | 09 09 73 68 6f 72 74 09 |....{...|..short.|
|00002470| 09 78 50 61 72 61 6d 42 | 75 66 20 3d 20 47 65 74 |.xParamB|uf = Get|
|00002480| 50 61 72 61 6d 50 6f 70 | 75 70 28 64 6c 67 2c 20 |ParamPop|up(dlg, |
|00002490| 78 50 6f 70 75 70 49 74 | 65 6d 29 3b 0d 09 09 09 |xPopupIt|em);....|
|000024a0| 09 73 68 6f 72 74 09 09 | 79 50 61 72 61 6d 42 75 |.short..|yParamBu|
|000024b0| 66 20 3d 20 47 65 74 50 | 61 72 61 6d 50 6f 70 75 |f = GetP|aramPopu|
|000024c0| 70 28 64 6c 67 2c 20 79 | 50 6f 70 75 70 49 74 65 |p(dlg, y|PopupIte|
|000024d0| 6d 29 3b 0d 09 09 09 09 | 42 6f 6f 6c 65 61 6e 09 |m);.....|Boolean.|
|000024e0| 09 7a 41 75 74 6f 6d 61 | 74 69 63 42 75 66 20 3d |.zAutoma|ticBuf =|
|000024f0| 20 4d 79 47 65 74 49 74 | 65 6d 56 61 6c 75 65 28 | MyGetIt|emValue(|
|00002500| 64 6c 67 2c 20 7a 41 75 | 74 6f 6d 61 74 69 63 49 |dlg, zAu|tomaticI|
|00002510| 74 65 6d 29 3b 0d 09 09 | 09 09 64 6f 75 62 6c 65 |tem);...|..double|
|00002520| 09 09 78 4d 69 6e 42 75 | 66 20 3d 20 78 4d 69 6e |..xMinBu|f = xMin|
|00002530| 2c 20 78 4d 61 78 42 75 | 66 20 3d 20 78 4d 61 78 |, xMaxBu|f = xMax|
|00002540| 3b 0d 09 09 09 09 64 6f | 75 62 6c 65 09 09 79 4d |;.....do|uble..yM|
|00002550| 69 6e 42 75 66 20 3d 20 | 79 4d 69 6e 2c 20 79 4d |inBuf = |yMin, yM|
|00002560| 61 78 42 75 66 20 3d 20 | 79 4d 61 78 3b 0d 09 09 |axBuf = |yMax;...|
|00002570| 09 09 64 6f 75 62 6c 65 | 09 09 7a 4d 69 6e 42 75 |..double|..zMinBu|
|00002580| 66 20 3d 20 7a 4d 69 6e | 2c 20 7a 4d 61 78 42 75 |f = zMin|, zMaxBu|
|00002590| 66 20 3d 20 7a 4d 61 78 | 3b 0d 09 09 09 09 6c 6f |f = zMax|;.....lo|
|000025a0| 6e 67 09 09 78 52 65 73 | 42 75 66 20 3d 20 78 52 |ng..xRes|Buf = xR|
|000025b0| 65 73 2c 20 79 52 65 73 | 42 75 66 20 3d 20 79 52 |es, yRes|Buf = yR|
|000025c0| 65 73 3b 0d 09 09 09 09 | 0d 09 09 09 09 69 66 20 |es;.....|.....if |
|000025d0| 28 78 50 61 72 61 6d 42 | 75 66 20 3d 3d 20 79 50 |(xParamB|uf == yP|
|000025e0| 61 72 61 6d 42 75 66 29 | 0d 09 09 09 09 7b 09 53 |aramBuf)|.....{.S|
|000025f0| 79 73 42 65 65 70 28 33 | 30 29 3b 0d 09 09 09 09 |ysBeep(3|0);.....|
|00002600| 09 4d 79 41 6c 65 72 74 | 28 33 30 30 30 32 29 3b |.MyAlert|(30002);|
|00002610| 09 09 09 09 09 09 09 09 | 09 09 2f 2f 20 79 6f 75 |........|..// you|
|00002620| 20 6d 75 73 74 20 73 65 | 6c 65 63 74 20 64 69 66 | must se|lect dif|
|00002630| 66 65 72 65 6e 74 20 78 | 20 61 6e 64 20 79 20 70 |ferent x| and y p|
|00002640| 61 72 61 6d 65 74 65 72 | 73 0d 09 09 09 09 09 69 |arameter|s......i|
|00002650| 74 65 6d 48 69 74 20 3d | 20 30 3b 0d 09 09 09 09 |temHit =| 0;.....|
|00002660| 7d 20 65 6c 73 65 20 69 | 66 20 28 21 28 0d 09 09 |} else i|f (!(...|
|00002670| 09 09 09 09 4d 79 47 65 | 74 45 78 74 65 6e 64 65 |....MyGe|tExtende|
|00002680| 64 49 74 65 6d 28 64 6c | 67 2c 20 78 46 72 6f 6d |dItem(dl|g, xFrom|
|00002690| 49 74 65 6d 2c 20 26 78 | 4d 69 6e 42 75 66 29 20 |Item, &x|MinBuf) |
|000026a0| 26 26 0d 09 09 09 09 09 | 09 4d 79 47 65 74 45 78 |&&......|.MyGetEx|
|000026b0| 74 65 6e 64 65 64 49 74 | 65 6d 28 64 6c 67 2c 20 |tendedIt|em(dlg, |
|000026c0| 78 54 6f 49 74 65 6d 2c | 20 26 78 4d 61 78 42 75 |xToItem,| &xMaxBu|
|000026d0| 66 29 20 26 26 0d 09 09 | 09 09 09 09 4d 79 47 65 |f) &&...|....MyGe|
|000026e0| 74 45 78 74 65 6e 64 65 | 64 49 74 65 6d 28 64 6c |tExtende|dItem(dl|
|000026f0| 67 2c 20 79 46 72 6f 6d | 49 74 65 6d 2c 20 26 79 |g, yFrom|Item, &y|
|00002700| 4d 69 6e 42 75 66 29 20 | 26 26 0d 09 09 09 09 09 |MinBuf) |&&......|
|00002710| 09 4d 79 47 65 74 45 78 | 74 65 6e 64 65 64 49 74 |.MyGetEx|tendedIt|
|00002720| 65 6d 28 64 6c 67 2c 20 | 79 54 6f 49 74 65 6d 2c |em(dlg, |yToItem,|
|00002730| 20 26 79 4d 61 78 42 75 | 66 29 20 26 26 0d 09 09 | &yMaxBu|f) &&...|
|00002740| 09 09 09 09 28 7a 41 75 | 74 6f 6d 61 74 69 63 42 |....(zAu|tomaticB|
|00002750| 75 66 20 7c 7c 20 28 7a | 41 75 74 6f 6d 61 74 69 |uf || (z|Automati|
|00002760| 63 42 75 66 20 3d 3d 20 | 66 61 6c 73 65 20 26 26 |cBuf == |false &&|
|00002770| 0d 09 09 09 09 09 09 09 | 4d 79 47 65 74 45 78 74 |........|MyGetExt|
|00002780| 65 6e 64 65 64 49 74 65 | 6d 28 64 6c 67 2c 20 7a |endedIte|m(dlg, z|
|00002790| 46 72 6f 6d 49 74 65 6d | 2c 20 26 7a 4d 69 6e 42 |FromItem|, &zMinB|
|000027a0| 75 66 29 20 26 26 0d 09 | 09 09 09 09 09 09 4d 79 |uf) &&..|......My|
|000027b0| 47 65 74 45 78 74 65 6e | 64 65 64 49 74 65 6d 28 |GetExten|dedItem(|
|000027c0| 64 6c 67 2c 20 7a 54 6f | 49 74 65 6d 2c 20 26 7a |dlg, zTo|Item, &z|
|000027d0| 4d 61 78 42 75 66 29 0d | 09 09 09 09 09 09 29 29 |MaxBuf).|......))|
|000027e0| 20 26 26 0d 09 09 09 09 | 09 09 47 65 74 52 65 73 | &&.....|..GetRes|
|000027f0| 6f 6c 75 74 69 6f 6e 28 | 64 6c 67 2c 20 78 52 65 |olution(|dlg, xRe|
|00002800| 73 49 74 65 6d 2c 20 26 | 78 52 65 73 42 75 66 29 |sItem, &|xResBuf)|
|00002810| 20 26 26 0d 09 09 09 09 | 09 09 47 65 74 52 65 73 | &&.....|..GetRes|
|00002820| 6f 6c 75 74 69 6f 6e 28 | 64 6c 67 2c 20 79 52 65 |olution(|dlg, yRe|
|00002830| 73 49 74 65 6d 2c 20 26 | 79 52 65 73 42 75 66 29 |sItem, &|yResBuf)|
|00002840| 29 29 0d 09 09 09 09 09 | 09 09 69 74 65 6d 48 69 |))......|..itemHi|
|00002850| 74 20 3d 20 30 3b 09 09 | 09 09 09 09 09 09 2f 2f |t = 0;..|......//|
|00002860| 20 69 66 20 62 61 64 20 | 65 6e 74 72 79 0d 09 09 | if bad |entry...|
|00002870| 09 09 65 6c 73 65 20 69 | 66 20 28 78 4d 69 6e 42 |..else i|f (xMinB|
|00002880| 75 66 20 3e 3d 20 78 4d | 61 78 42 75 66 29 0d 09 |uf >= xM|axBuf)..|
|00002890| 09 09 09 7b 09 4d 79 53 | 65 6c 65 63 74 49 74 65 |...{.MyS|electIte|
|000028a0| 6d 54 65 78 74 28 64 6c | 67 2c 20 78 46 72 6f 6d |mText(dl|g, xFrom|
|000028b0| 49 74 65 6d 2c 20 30 2c | 20 30 78 37 46 46 46 29 |Item, 0,| 0x7FFF)|
|000028c0| 3b 0d 09 09 09 09 09 53 | 79 73 42 65 65 70 28 33 |;......S|ysBeep(3|
|000028d0| 30 29 3b 0d 09 09 09 09 | 09 69 74 65 6d 48 69 74 |0);.....|.itemHit|
|000028e0| 20 3d 20 30 3b 0d 09 09 | 09 09 7d 0d 09 09 09 09 | = 0;...|..}.....|
|000028f0| 65 6c 73 65 20 69 66 20 | 28 79 4d 69 6e 42 75 66 |else if |(yMinBuf|
|00002900| 20 3e 3d 20 79 4d 61 78 | 42 75 66 29 0d 09 09 09 | >= yMax|Buf)....|
|00002910| 09 7b 09 4d 79 53 65 6c | 65 63 74 49 74 65 6d 54 |.{.MySel|ectItemT|
|00002920| 65 78 74 28 64 6c 67 2c | 20 79 46 72 6f 6d 49 74 |ext(dlg,| yFromIt|
|00002930| 65 6d 2c 20 30 2c 20 30 | 78 37 46 46 46 29 3b 0d |em, 0, 0|x7FFF);.|
|00002940| 09 09 09 09 09 53 79 73 | 42 65 65 70 28 33 30 29 |.....Sys|Beep(30)|
|00002950| 3b 0d 09 09 09 09 09 69 | 74 65 6d 48 69 74 20 3d |;......i|temHit =|
|00002960| 20 30 3b 0d 09 09 09 09 | 7d 0d 09 09 09 09 65 6c | 0;.....|}.....el|
|00002970| 73 65 20 69 66 20 28 21 | 7a 41 75 74 6f 6d 61 74 |se if (!|zAutomat|
|00002980| 69 63 42 75 66 20 26 26 | 20 7a 4d 69 6e 42 75 66 |icBuf &&| zMinBuf|
|00002990| 20 3e 3d 20 7a 4d 61 78 | 42 75 66 29 0d 09 09 09 | >= zMax|Buf)....|
|000029a0| 09 7b 09 4d 79 53 65 6c | 65 63 74 49 74 65 6d 54 |.{.MySel|ectItemT|
|000029b0| 65 78 74 28 64 6c 67 2c | 20 7a 46 72 6f 6d 49 74 |ext(dlg,| zFromIt|
|000029c0| 65 6d 2c 20 30 2c 20 30 | 78 37 46 46 46 29 3b 0d |em, 0, 0|x7FFF);.|
|000029d0| 09 09 09 09 09 53 79 73 | 42 65 65 70 28 33 30 29 |.....Sys|Beep(30)|
|000029e0| 3b 0d 09 09 09 09 09 69 | 74 65 6d 48 69 74 20 3d |;......i|temHit =|
|000029f0| 20 30 3b 0d 09 09 09 09 | 7d 0d 09 09 09 09 65 6c | 0;.....|}.....el|
|00002a00| 73 65 0d 09 09 09 09 7b | 09 78 52 65 73 20 3d 20 |se.....{|.xRes = |
|00002a10| 78 52 65 73 42 75 66 3b | 0d 09 09 09 09 09 79 52 |xResBuf;|......yR|
|00002a20| 65 73 20 3d 20 79 52 65 | 73 42 75 66 3b 0d 09 09 |es = yRe|sBuf;...|
|00002a30| 09 09 09 53 65 74 47 72 | 61 66 52 61 6e 67 65 28 |...SetGr|afRange(|
|00002a40| 30 2c 20 78 4d 69 6e 42 | 75 66 2c 20 78 4d 61 78 |0, xMinB|uf, xMax|
|00002a50| 42 75 66 29 3b 0d 09 09 | 09 09 09 53 65 74 47 72 |Buf);...|...SetGr|
|00002a60| 61 66 52 61 6e 67 65 28 | 31 2c 20 79 4d 69 6e 42 |afRange(|1, yMinB|
|00002a70| 75 66 2c 20 79 4d 61 78 | 42 75 66 29 3b 0d 09 09 |uf, yMax|Buf);...|
|00002a80| 09 09 09 53 65 74 47 72 | 61 66 52 61 6e 67 65 28 |...SetGr|afRange(|
|00002a90| 32 2c 20 7a 4d 69 6e 42 | 75 66 2c 20 7a 4d 61 78 |2, zMinB|uf, zMax|
|00002aa0| 42 75 66 29 3b 0d 09 09 | 09 09 09 78 50 61 72 61 |Buf);...|...xPara|
|00002ab0| 6d 20 3d 20 78 50 61 72 | 61 6d 42 75 66 3b 0d 09 |m = xPar|amBuf;..|
|00002ac0| 09 09 09 09 79 50 61 72 | 61 6d 20 3d 20 79 50 61 |....yPar|am = yPa|
|00002ad0| 72 61 6d 42 75 66 3b 0d | 09 09 09 09 09 7a 41 75 |ramBuf;.|.....zAu|
|00002ae0| 74 6f 6d 61 74 69 63 20 | 3d 20 7a 41 75 74 6f 6d |tomatic |= zAutom|
|00002af0| 61 74 69 63 42 75 66 3b | 0d 09 09 09 09 7d 0d 09 |aticBuf;|.....}..|
|00002b00| 09 09 7d 2f 2f 20 63 61 | 73 65 20 6f 6b 0d 09 09 |..}// ca|se ok...|
|00002b10| 7d 2f 2f 73 77 69 74 63 | 68 0d 09 7d 77 68 69 6c |}//switc|h..}whil|
|00002b20| 65 20 28 69 74 65 6d 48 | 69 74 20 21 3d 20 6f 6b |e (itemH|it != ok|
|00002b30| 20 26 26 20 69 74 65 6d | 48 69 74 20 21 3d 20 63 | && item|Hit != c|
|00002b40| 61 6e 63 65 6c 29 3b 0d | 0d 09 47 65 74 47 6c 6f |ancel);.|..GetGlo|
|00002b50| 62 61 6c 57 69 6e 64 6f | 77 52 65 63 74 28 64 6c |balWindo|wRect(dl|
|00002b60| 67 2d 3e 64 69 61 6c 6f | 67 2c 20 26 73 65 74 75 |g->dialo|g, &setu|
|00002b70| 70 44 69 61 6c 6f 67 52 | 65 63 74 29 3b 0d 09 4d |pDialogR|ect);..M|
|00002b80| 79 44 69 73 70 6f 73 65 | 44 69 61 6c 6f 67 28 64 |yDispose|Dialog(d|
|00002b90| 6c 67 29 3b 0d 09 69 66 | 20 28 69 74 65 6d 48 69 |lg);..if| (itemHi|
|00002ba0| 74 20 3d 3d 20 6f 6b 29 | 0d 09 09 72 65 74 76 61 |t == ok)|...retva|
|00002bb0| 6c 20 3d 20 43 61 6c 63 | 75 6c 61 74 65 44 61 74 |l = Calc|ulateDat|
|00002bc0| 61 41 72 72 61 79 28 29 | 3b 0d 0d 64 6f 6e 65 3a |aArray()|;..done:|
|00002bd0| 0d 09 72 65 74 75 72 6e | 20 72 65 74 76 61 6c 3b |..return| retval;|
|00002be0| 0d 7d 0d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.}......|........|
|00002bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c00| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00002c10| 6c 64 73 20 6f 6e 20 74 | 68 65 69 72 20 6e 61 74 |lds on t|heir nat|
|00002c20| 75 72 61 6c 20 62 6f 75 | 6e 64 61 72 69 65 73 2c |ural bou|ndaries,|
|00002c30| 10 50 6c 6f 74 33 44 46 | 75 6e 63 74 69 6f 6e 2e |.Plot3DF|unction.|
|00002c40| 63 74 02 00 00 00 54 45 | 58 54 43 57 49 45 01 00 |ct....TE|XTCWIE..|
|00002c50| 00 00 54 45 58 54 43 57 | 49 45 01 00 b2 1c b2 00 |..TEXTCW|IE......|
|00002c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c70| 00 00 ad 70 4e 10 00 00 | 2b 63 00 00 01 9a 67 6e |...pN...|+c....gn|
|00002c80| 20 66 69 65 6c 64 73 20 | 6f 6e 20 74 68 65 69 72 | fields |on their|
|00002c90| 20 6e 61 74 75 72 61 6c | 20 62 6f 75 6e 64 61 72 | natural| boundar|
|00002ca0| 69 65 73 2c 20 63 68 6f | 6f 73 65 20 74 68 69 73 |ies, cho|ose this|
|00002cb0| 20 69 74 65 6d 2e 20 54 | 68 69 73 20 69 73 20 74 | item. T|his is t|
|00002cc0| 68 65 20 73 74 61 6e 64 | 61 72 64 20 61 6c 69 67 |he stand|ard alig|
|00002cd0| 6e 6d 65 6e 74 20 66 6f | 72 20 61 20 50 50 43 20 |nment fo|r a PPC |
|00002ce0| 4d 61 63 69 6e 74 6f 73 | 68 2e 20 43 68 65 63 6b |Macintos|h. Check|
|00002cf0| 65 64 20 62 65 63 61 75 | 73 65 20 69 74 20 69 73 |ed becau|se it is|
|00002d00| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00002d10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002d20| 00 00 00 00 00 00 00 03 | 00 04 00 8f 00 09 03 2c |........|.......,|
|00002d30| 02 6b 00 8f 00 09 03 2c | 02 6b ae 14 46 5b 00 00 |.k.....,|.k..F[..|
|00002d40| 17 9a 00 00 17 9a 00 00 | 14 ca 01 09 00 00 00 04 |........|........|
|00002d50| 00 01 00 01 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|00002d60| 00 00 00 46 02 95 ff 8c | 38 8e 00 00 00 1c 00 46 |...F....|8......F|
|00002d70| 00 01 4d 50 53 52 00 00 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00002d80| 00 1e 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 f0 |........|........|
|00002d90| ff ff 00 00 00 4c 00 00 | 00 00 00 00 00 00 00 00 |.....L..|........|
|00002da0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+